object DM1: TDM1
  OldCreateOrder = False
  OnCreate = DataModuleCreate
  Height = 739
  Width = 742
  object CONEXAO: TSQLConnection
    DriverName = 'Firebird'
    GetDriverFunc = 'getSQLDriverINTERBASE'
    LibraryName = 'dbxfb.dll'
    LoginPrompt = False
    Params.Strings = (
      'DriverUnit=DBXFirebird'
      
        'DriverPackageLoader=TDBXDynalinkDriverLoader,DbxCommonDriver150.' +
        'bpl'
      
        'DriverAssemblyLoader=Borland.Data.TDBXDynalinkDriverLoader,Borla' +
        'nd.Data.DbxCommonDriver,Version=15.0.0.0,Culture=neutral,PublicK' +
        'eyToken=91d62ebb5b0d1b1b'
      
        'MetaDataPackageLoader=TDBXFirebirdMetaDataCommandFactory,DbxFire' +
        'birdDriver150.bpl'
      
        'MetaDataAssemblyLoader=Borland.Data.TDBXFirebirdMetaDataCommandF' +
        'actory,Borland.Data.DbxFirebirdDriver,Version=15.0.0.0,Culture=n' +
        'eutral,PublicKeyToken=91d62ebb5b0d1b1b'
      'GetDriverFunc=getSQLDriverINTERBASE'
      'LibraryName=dbxfb.dll'
      'VendorLib=fbclient.DLL'
      
        'Database=localhost:D:\PROJETOS\CONTROLE DE IMPLANTA'#199#195'O\CONTROLE.' +
        'FDB'
      'User_Name=sysdba'
      'Password=masterkey'
      'Role=RoleName'
      'MaxBlobSize=-1'
      'LocaleCode=0000'
      'IsolationLevel=ReadCommitted'
      'SQLDialect=3'
      'CommitRetain=False'
      'WaitOnLocks=True'
      'TrimChar=False'
      'BlobSize=-1'
      'ErrorResourceFile='
      'RoleName=RoleName'
      'ServerCharSet='
      'Trim Char=False')
    VendorLib = 'fbclient.DLL'
    BeforeConnect = CONEXAOBeforeConnect
    Connected = True
    Left = 40
    Top = 16
  end
  object sdsConsultor: TSQLDataSet
    SchemaName = 'sysdba'
    CommandText = 'select first 0 * from consultor'
    DbxCommandType = 'Dbx.SQL'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = CONEXAO
    Left = 96
    Top = 80
    object sdsConsultorCOD_CONSULTOR: TIntegerField
      FieldName = 'COD_CONSULTOR'
      Required = True
    end
    object sdsConsultorNOME_CONSULTOR: TStringField
      FieldName = 'NOME_CONSULTOR'
      Size = 50
    end
    object sdsConsultorTELEFONE1_CONSULTOR: TStringField
      FieldName = 'TELEFONE1_CONSULTOR'
      Size = 11
    end
    object sdsConsultorTELEFONE2_CONSULTOR: TStringField
      FieldName = 'TELEFONE2_CONSULTOR'
      Size = 11
    end
    object sdsConsultorATIVO_CONSULTOR: TStringField
      FieldName = 'ATIVO_CONSULTOR'
      FixedChar = True
      Size = 1
    end
    object sdsConsultorCOR_LEGENDA_CONSULTOR: TStringField
      FieldName = 'COR_LEGENDA_CONSULTOR'
      Size = 50
    end
  end
  object cdsConsultor: TClientDataSet
    Aggregates = <>
    AggregatesActive = True
    Params = <>
    ProviderName = 'dspConsultor'
    AfterPost = cdsConsultorAfterPost
    AfterDelete = cdsConsultorAfterDelete
    Left = 40
    Top = 208
    object cdsConsultorCOD_CONSULTOR: TIntegerField
      FieldName = 'COD_CONSULTOR'
      Required = True
    end
    object cdsConsultorNOME_CONSULTOR: TStringField
      FieldName = 'NOME_CONSULTOR'
      Size = 50
    end
    object cdsConsultorTELEFONE1_CONSULTOR: TStringField
      FieldName = 'TELEFONE1_CONSULTOR'
      Size = 11
    end
    object cdsConsultorTELEFONE2_CONSULTOR: TStringField
      FieldName = 'TELEFONE2_CONSULTOR'
      Size = 11
    end
    object cdsConsultorATIVO_CONSULTOR: TStringField
      FieldName = 'ATIVO_CONSULTOR'
      FixedChar = True
      Size = 1
    end
    object cdsConsultorCOR_LEGENDA_CONSULTOR: TStringField
      FieldName = 'COR_LEGENDA_CONSULTOR'
      Size = 50
    end
  end
  object dspConsultor: TDataSetProvider
    DataSet = sdsConsultor
    Left = 40
    Top = 144
  end
  object cdsTrueFalse: TClientDataSet
    Active = True
    Aggregates = <>
    Params = <>
    Left = 40
    Top = 272
    Data = {
      500000009619E0BD010000001800000002000000000003000000500003434F44
      01004900000001000557494454480200020001000964657363726963616F0100
      490000000100055749445448020002000A000000}
    object cdsTrueFalseCOD: TStringField
      FieldName = 'COD'
      Size = 1
    end
    object cdsTrueFalsedescricao: TStringField
      FieldName = 'descricao'
      Size = 10
    end
  end
  object sdsCliente: TSQLDataSet
    SchemaName = 'sysdba'
    CommandText = 'select first 0 * from cliente'
    DbxCommandType = 'Dbx.SQL'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = CONEXAO
    Left = 160
    Top = 80
    object sdsClienteCOD_CLIENTE: TIntegerField
      DisplayLabel = 'CODIGO'
      FieldName = 'COD_CLIENTE'
    end
    object sdsClienteNOME_CLIENTE: TStringField
      DisplayLabel = 'NOME'
      FieldName = 'NOME_CLIENTE'
      Size = 50
    end
    object sdsClienteENDERECO_CLIENTE: TStringField
      DisplayLabel = 'ENDERE'#199'O'
      FieldName = 'ENDERECO_CLIENTE'
      Size = 100
    end
    object sdsClienteBAIRRO_CLIENTE: TStringField
      DisplayLabel = 'BAIRRO'
      FieldName = 'BAIRRO_CLIENTE'
      Size = 50
    end
    object sdsClienteCOMPLEMENTO_CLIENTE: TStringField
      DisplayLabel = 'COMPLEMENTO'
      FieldName = 'COMPLEMENTO_CLIENTE'
      Size = 50
    end
    object sdsClienteUF_CLIENTE: TStringField
      DisplayLabel = 'UF'
      FieldName = 'UF_CLIENTE'
      FixedChar = True
      Size = 2
    end
    object sdsClienteOBS_CLIENTE: TStringField
      DisplayLabel = 'OBSERVA'#199#195'O'
      FieldName = 'OBS_CLIENTE'
      Size = 1000
    end
    object sdsClienteCOD_CIDADE: TIntegerField
      DisplayLabel = 'CIDADE'
      FieldName = 'COD_CIDADE'
    end
  end
  object cdsCliente: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspCliente'
    AfterOpen = cdsClienteAfterOpen
    AfterPost = cdsClienteAfterPost
    AfterDelete = cdsClienteAfterDelete
    Left = 160
    Top = 208
    object cdsClienteCOD_CLIENTE: TIntegerField
      FieldName = 'COD_CLIENTE'
    end
    object cdsClienteNOME_CLIENTE: TStringField
      FieldName = 'NOME_CLIENTE'
      Size = 50
    end
    object cdsClienteENDERECO_CLIENTE: TStringField
      FieldName = 'ENDERECO_CLIENTE'
      Size = 100
    end
    object cdsClienteBAIRRO_CLIENTE: TStringField
      FieldName = 'BAIRRO_CLIENTE'
      Size = 50
    end
    object cdsClienteCOMPLEMENTO_CLIENTE: TStringField
      FieldName = 'COMPLEMENTO_CLIENTE'
      Size = 50
    end
    object cdsClienteUF_CLIENTE: TStringField
      FieldName = 'UF_CLIENTE'
      FixedChar = True
      Size = 2
    end
    object cdsClienteOBS_CLIENTE: TStringField
      FieldName = 'OBS_CLIENTE'
      Size = 1000
    end
    object cdsClienteCOD_CIDADE: TIntegerField
      FieldName = 'COD_CIDADE'
    end
  end
  object dspCliente: TDataSetProvider
    DataSet = sdsCliente
    Left = 160
    Top = 144
  end
  object sdsCidade: TSQLDataSet
    SchemaName = 'sysdba'
    CommandText = 'select  * from cidade'
    DbxCommandType = 'Dbx.SQL'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = CONEXAO
    Left = 224
    Top = 80
    object sdsCidadeCOD_CIDADE: TIntegerField
      FieldName = 'COD_CIDADE'
      Required = True
    end
    object sdsCidadeNOME_CIDADE: TStringField
      FieldName = 'NOME_CIDADE'
      Size = 50
    end
    object sdsCidadeUF_CIDADE: TStringField
      FieldName = 'UF_CIDADE'
      Size = 2
    end
    object sdsCidadeCOD_IBGE_CIDADE: TStringField
      FieldName = 'COD_IBGE_CIDADE'
    end
  end
  object dspCidade: TDataSetProvider
    DataSet = sdsCidade
    Left = 224
    Top = 144
  end
  object cdsCidade: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspCidade'
    Left = 224
    Top = 208
  end
  object sdsVeiculo: TSQLDataSet
    SchemaName = 'sysdba'
    CommandText = 'select first 0 * from veiculo'
    DbxCommandType = 'Dbx.SQL'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = CONEXAO
    Left = 312
    Top = 80
    object sdsVeiculoCOD_VEICULO: TIntegerField
      FieldName = 'COD_VEICULO'
      Required = True
    end
    object sdsVeiculoMARCA_VEICULO: TStringField
      FieldName = 'MARCA_VEICULO'
    end
    object sdsVeiculoMODELO_VEICULO: TStringField
      FieldName = 'MODELO_VEICULO'
    end
    object sdsVeiculoDESCRICAO_VEICULO: TStringField
      FieldName = 'DESCRICAO_VEICULO'
      Size = 50
    end
  end
  object dspVeiculo: TDataSetProvider
    DataSet = sdsVeiculo
    Left = 312
    Top = 144
  end
  object cdsVeiculo: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspVeiculo'
    AfterPost = cdsVeiculoAfterPost
    AfterDelete = cdsVeiculoAfterDelete
    Left = 312
    Top = 208
    object cdsVeiculoCOD_VEICULO: TIntegerField
      FieldName = 'COD_VEICULO'
      Required = True
    end
    object cdsVeiculoMARCA_VEICULO: TStringField
      FieldName = 'MARCA_VEICULO'
    end
    object cdsVeiculoMODELO_VEICULO: TStringField
      FieldName = 'MODELO_VEICULO'
    end
    object cdsVeiculoDESCRICAO_VEICULO: TStringField
      FieldName = 'DESCRICAO_VEICULO'
      Size = 50
    end
  end
  object sdsStatusImplantacao: TSQLDataSet
    SchemaName = 'sysdba'
    CommandText = 'select first 0 * from implantacao_status'
    DbxCommandType = 'Dbx.SQL'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = CONEXAO
    Left = 408
    Top = 80
    object sdsStatusImplantacaoCOD_STATUS: TStringField
      FieldName = 'COD_STATUS'
      Required = True
      Size = 4
    end
    object sdsStatusImplantacaoDESCRICAO_STATUS: TStringField
      FieldName = 'DESCRICAO_STATUS'
      Size = 50
    end
    object sdsStatusImplantacaoATIVO_STATUS: TStringField
      FieldName = 'ATIVO_STATUS'
      FixedChar = True
      Size = 1
    end
    object sdsStatusImplantacaoCOR_STATUS: TStringField
      FieldName = 'COR_STATUS'
      Size = 30
    end
  end
  object dspStatusImplantacao: TDataSetProvider
    DataSet = sdsStatusImplantacao
    Left = 408
    Top = 144
  end
  object cdsStatusImplantacao: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspStatusImplantacao'
    AfterPost = cdsStatusImplantacaoAfterPost
    AfterDelete = cdsStatusImplantacaoAfterDelete
    Left = 408
    Top = 208
    object cdsStatusImplantacaoCOD_STATUS: TStringField
      FieldName = 'COD_STATUS'
      Required = True
      Size = 4
    end
    object cdsStatusImplantacaoDESCRICAO_STATUS: TStringField
      FieldName = 'DESCRICAO_STATUS'
      Size = 50
    end
    object cdsStatusImplantacaoATIVO_STATUS: TStringField
      FieldName = 'ATIVO_STATUS'
      FixedChar = True
      Size = 1
    end
    object cdsStatusImplantacaoCOR_STATUS: TStringField
      FieldName = 'COR_STATUS'
      Size = 30
    end
  end
  object sdsImplantacao: TSQLDataSet
    SchemaName = 'sysdba'
    CommandText = 'select first 0 * from implantacao'
    DbxCommandType = 'Dbx.SQL'
    MaxBlobSize = 1
    Params = <>
    SQLConnection = CONEXAO
    Left = 528
    Top = 80
    object sdsImplantacaoCOD_IMPLANTACAO: TIntegerField
      FieldName = 'COD_IMPLANTACAO'
      Required = True
    end
    object sdsImplantacaoCOD_CLIENTE: TIntegerField
      FieldName = 'COD_CLIENTE'
    end
    object sdsImplantacaoOBS_IMPLANTACAO: TMemoField
      FieldName = 'OBS_IMPLANTACAO'
      BlobType = ftMemo
      Size = 1
    end
    object sdsImplantacaoCOD_STATUS: TStringField
      FieldName = 'COD_STATUS'
      Size = 4
    end
    object sdsImplantacaoDATA_INICIO: TDateField
      FieldName = 'DATA_INICIO'
    end
    object sdsImplantacaoDATA_CONCLUSAO: TDateField
      FieldName = 'DATA_CONCLUSAO'
    end
    object sdsImplantacaoCOD_VEICULO: TIntegerField
      FieldName = 'COD_VEICULO'
    end
    object sdsImplantacaoCOD_TIPO_ATENDIMENTO: TStringField
      FieldName = 'COD_TIPO_ATENDIMENTO'
      Size = 4
    end
  end
  object dspImplantacao: TDataSetProvider
    DataSet = sdsImplantacao
    UpdateMode = upWhereKeyOnly
    Left = 528
    Top = 144
  end
  object cdsImplantacao: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspImplantacao'
    AfterPost = cdsImplantacaoAfterPost
    AfterDelete = cdsImplantacaoAfterDelete
    Left = 528
    Top = 208
    object cdsImplantacaoCOD_IMPLANTACAO: TIntegerField
      FieldName = 'COD_IMPLANTACAO'
      Required = True
    end
    object cdsImplantacaoCOD_CLIENTE: TIntegerField
      DisplayLabel = 'C'#211'DIGO DO CLIENTE'
      FieldName = 'COD_CLIENTE'
    end
    object cdsImplantacaoOBS_IMPLANTACAO: TMemoField
      FieldName = 'OBS_IMPLANTACAO'
      BlobType = ftMemo
      Size = 1
    end
    object cdsImplantacaoCOD_STATUS: TStringField
      FieldName = 'COD_STATUS'
      Size = 4
    end
    object cdsImplantacaoDATA_INICIO: TDateField
      FieldName = 'DATA_INICIO'
    end
    object cdsImplantacaoDATA_CONCLUSAO: TDateField
      FieldName = 'DATA_CONCLUSAO'
    end
    object cdsImplantacaoCOD_VEICULO: TIntegerField
      FieldName = 'COD_VEICULO'
    end
    object cdsImplantacaoNomeCliente: TStringField
      FieldKind = fkLookup
      FieldName = 'NomeCliente'
      LookupDataSet = sdsTempCliente
      LookupKeyFields = 'COD_CLIENTE'
      LookupResultField = 'NOME_CLIENTE'
      KeyFields = 'COD_CLIENTE'
      ProviderFlags = []
      Size = 100
      Lookup = True
    end
    object cdsImplantacaosdsDetailImplantacaoAgendamento: TDataSetField
      FieldName = 'sdsDetailImplantacaoAgendamento'
    end
    object cdsImplantacaosdsDetailImplantacaoOcorrencia: TDataSetField
      FieldName = 'sdsDetailImplantacaoOcorrencia'
    end
    object cdsImplantacaosdsDetailImplantacaoAnexo: TDataSetField
      FieldName = 'sdsDetailImplantacaoAnexo'
    end
    object cdsImplantacaosdsDetailImplantacaoModulo: TDataSetField
      FieldName = 'sdsDetailImplantacaoModulo'
    end
    object cdsImplantacaosdsDetailImplantacaoConsultor: TDataSetField
      FieldName = 'sdsDetailImplantacaoConsultor'
    end
    object cdsImplantacaoCOD_TIPO_ATENDIMENTO: TStringField
      FieldName = 'COD_TIPO_ATENDIMENTO'
      Size = 4
    end
  end
  object sdsTempCliente: TSQLDataSet
    SchemaName = 'sysdba'
    CommandText = 'select * from cliente'
    DbxCommandType = 'Dbx.SQL'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = CONEXAO
    Left = 648
    Top = 88
    object sdsTempClienteCOD_CLIENTE: TIntegerField
      FieldName = 'COD_CLIENTE'
      Required = True
    end
    object sdsTempClienteNOME_CLIENTE: TStringField
      FieldName = 'NOME_CLIENTE'
      Size = 50
    end
  end
  object cdsDetailImplantacaoAgendamento: TClientDataSet
    Aggregates = <>
    DataSetField = cdsImplantacaosdsDetailImplantacaoAgendamento
    Params = <>
    AfterPost = cdsDetailImplantacaoAgendamentoAfterPost
    AfterDelete = cdsDetailImplantacaoAgendamentoAfterDelete
    Left = 80
    Top = 336
    object cdsDetailImplantacaoAgendamentoCOD_AGENDAMENTO: TIntegerField
      FieldName = 'COD_AGENDAMENTO'
      ProviderFlags = [pfInWhere, pfInKey]
      Visible = False
    end
    object cdsDetailImplantacaoAgendamentoCOD_IMPLANTACAO: TIntegerField
      FieldName = 'COD_IMPLANTACAO'
      ProviderFlags = [pfInWhere]
      Visible = False
    end
    object cdsDetailImplantacaoAgendamentoDATA_INICIO_AGENDAMENTO: TDateField
      DisplayLabel = 'DATA'
      FieldName = 'DATA_INICIO_AGENDAMENTO'
      ProviderFlags = [pfInUpdate]
    end
    object cdsDetailImplantacaoAgendamentoDATA_FIM_AGENDAMENTO: TDateField
      FieldName = 'DATA_FIM_AGENDAMENTO'
      ProviderFlags = []
      Visible = False
    end
  end
  object sdsDetailImplantacaoAgendamento: TSQLDataSet
    SchemaName = 'sysdba'
    CommandText = 
      'select * from implantacao_agendamento where cod_implantacao = :c' +
      'od_implantacao'
    DbxCommandType = 'Dbx.SQL'
    DataSource = dsImplantacao
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftInteger
        Name = 'cod_implantacao'
        ParamType = ptInput
      end>
    SQLConnection = CONEXAO
    Left = 80
    Top = 392
    object sdsDetailImplantacaoAgendamentoCOD_AGENDAMENTO: TIntegerField
      FieldName = 'COD_AGENDAMENTO'
    end
    object sdsDetailImplantacaoAgendamentoCOD_IMPLANTACAO: TIntegerField
      FieldName = 'COD_IMPLANTACAO'
    end
    object sdsDetailImplantacaoAgendamentoDATA_INICIO_AGENDAMENTO: TDateField
      FieldName = 'DATA_INICIO_AGENDAMENTO'
    end
    object sdsDetailImplantacaoAgendamentoDATA_FIM_AGENDAMENTO: TDateField
      FieldName = 'DATA_FIM_AGENDAMENTO'
    end
  end
  object dsImplantacao: TDataSource
    DataSet = sdsImplantacao
    Left = 160
    Top = 296
  end
  object sdsDetailImplantacaoOcorrencia: TSQLDataSet
    SchemaName = 'sysdba'
    CommandText = 
      'select * from IMPLANTACAO_OCORRENCIA where'#13#10'COD_IMPLANTACAO = :c' +
      'od_implantacao'
    DbxCommandType = 'Dbx.SQL'
    DataSource = dsImplantacaoOcorrencia
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftInteger
        Name = 'cod_implantacao'
        ParamType = ptInput
      end>
    SQLConnection = CONEXAO
    Left = 296
    Top = 392
  end
  object cdsDetailImplantacaoOcorrencia: TClientDataSet
    Aggregates = <>
    DataSetField = cdsImplantacaosdsDetailImplantacaoOcorrencia
    Params = <>
    AfterPost = cdsDetailImplantacaoOcorrenciaAfterPost
    AfterDelete = cdsDetailImplantacaoOcorrenciaAfterDelete
    Left = 296
    Top = 328
    object cdsDetailImplantacaoOcorrenciaDATA_OCORRENCIA: TSQLTimeStampField
      DisplayLabel = 'DATA OCORR'#202'NCIA'
      FieldName = 'DATA_OCORRENCIA'
      ProviderFlags = [pfInUpdate]
    end
    object cdsDetailImplantacaoOcorrenciaDESCRICAO_OCORRENCIA: TStringField
      DisplayLabel = 'DESCRI'#199#195'O'
      DisplayWidth = 150
      FieldName = 'DESCRICAO_OCORRENCIA'
      ProviderFlags = [pfInUpdate]
      Size = 2000
    end
    object cdsDetailImplantacaoOcorrenciaCOD_OCORRENCIA: TIntegerField
      FieldName = 'COD_OCORRENCIA'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
      Visible = False
    end
    object cdsDetailImplantacaoOcorrenciaCOD_IMPLANTACAO: TIntegerField
      FieldName = 'COD_IMPLANTACAO'
      ProviderFlags = [pfInUpdate]
      Visible = False
    end
    object cdsDetailImplantacaoOcorrenciaDATA_CADASTRO_OCORRENCIA: TSQLTimeStampField
      FieldName = 'DATA_CADASTRO_OCORRENCIA'
      ProviderFlags = [pfInUpdate]
      Visible = False
    end
  end
  object dsImplantacaoOcorrencia: TDataSource
    DataSet = sdsImplantacao
    Left = 296
    Top = 280
  end
  object sdsDetailImplantacaoAnexo: TSQLDataSet
    SchemaName = 'sysdba'
    CommandText = 
      'select * from implantacao_anexo where cod_implantacao = :cod_imp' +
      'lantacao'
    DbxCommandType = 'Dbx.SQL'
    DataSource = dsImplantacaoAnexo
    MaxBlobSize = 1
    Params = <
      item
        DataType = ftInteger
        Name = 'cod_implantacao'
        ParamType = ptInput
      end>
    SQLConnection = CONEXAO
    Left = 464
    Top = 392
    object sdsDetailImplantacaoAnexoCOD_ANEXO: TIntegerField
      FieldName = 'COD_ANEXO'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
    end
    object sdsDetailImplantacaoAnexoDESCRICAO_ANEXO: TStringField
      DisplayLabel = 'DESCRI'#199#195'O'
      FieldName = 'DESCRICAO_ANEXO'
      ProviderFlags = [pfInUpdate]
      Size = 100
    end
    object sdsDetailImplantacaoAnexoNOME_ARQUIVO_ANEXO: TStringField
      DisplayLabel = 'NOME ARQUIVO'
      FieldName = 'NOME_ARQUIVO_ANEXO'
      ProviderFlags = [pfInUpdate]
      Size = 150
    end
    object sdsDetailImplantacaoAnexoEXTENSAO_ARQUIVO_ANEXO: TStringField
      FieldName = 'EXTENSAO_ARQUIVO_ANEXO'
      ProviderFlags = [pfInUpdate]
      Visible = False
      Size = 10
    end
    object sdsDetailImplantacaoAnexoARQUIVO_ANEXO: TBlobField
      FieldName = 'ARQUIVO_ANEXO'
      ProviderFlags = [pfInUpdate]
      Visible = False
      Size = 1
    end
    object sdsDetailImplantacaoAnexoCOD_IMPLANTACAO: TIntegerField
      FieldName = 'COD_IMPLANTACAO'
      ProviderFlags = [pfInUpdate]
      Visible = False
    end
  end
  object cdsDetailImplantacaoAnexo: TClientDataSet
    Aggregates = <>
    DataSetField = cdsImplantacaosdsDetailImplantacaoAnexo
    Params = <>
    AfterPost = cdsDetailImplantacaoAnexoAfterPost
    AfterDelete = cdsDetailImplantacaoAnexoAfterDelete
    Left = 464
    Top = 328
    object cdsDetailImplantacaoAnexoCOD_ANEXO: TIntegerField
      FieldName = 'COD_ANEXO'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
    end
    object cdsDetailImplantacaoAnexoDESCRICAO_ANEXO: TStringField
      DisplayLabel = 'DESCRI'#199#195'O'
      DisplayWidth = 80
      FieldName = 'DESCRICAO_ANEXO'
      ProviderFlags = [pfInUpdate]
      Size = 100
    end
    object cdsDetailImplantacaoAnexoNOME_ARQUIVO_ANEXO: TStringField
      DisplayLabel = 'NOME ARQUIVO'
      FieldName = 'NOME_ARQUIVO_ANEXO'
      ProviderFlags = [pfInUpdate]
      Size = 150
    end
    object cdsDetailImplantacaoAnexoEXTENSAO_ARQUIVO_ANEXO: TStringField
      FieldName = 'EXTENSAO_ARQUIVO_ANEXO'
      ProviderFlags = [pfInUpdate]
      Visible = False
      Size = 10
    end
    object cdsDetailImplantacaoAnexoARQUIVO_ANEXO: TBlobField
      FieldName = 'ARQUIVO_ANEXO'
      ProviderFlags = [pfInUpdate]
      Visible = False
      Size = 1
    end
    object cdsDetailImplantacaoAnexoCOD_IMPLANTACAO: TIntegerField
      FieldName = 'COD_IMPLANTACAO'
      ProviderFlags = [pfInUpdate]
      Visible = False
    end
  end
  object dsImplantacaoAnexo: TDataSource
    DataSet = sdsImplantacao
    Left = 464
    Top = 281
  end
  object dsImplantacaoModulo: TDataSource
    DataSet = sdsImplantacao
    Left = 608
    Top = 280
  end
  object cdsDetailImplantacaoModulo: TClientDataSet
    Aggregates = <>
    DataSetField = cdsImplantacaosdsDetailImplantacaoModulo
    Params = <>
    AfterPost = cdsDetailImplantacaoModuloAfterPost
    AfterDelete = cdsDetailImplantacaoModuloAfterDelete
    Left = 608
    Top = 336
    object cdsDetailImplantacaoModuloCOD_IMPLANTACAO: TIntegerField
      FieldName = 'COD_IMPLANTACAO'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object cdsDetailImplantacaoModuloCOMERCIAL_MODULO: TStringField
      FieldName = 'COMERCIAL_MODULO'
      ProviderFlags = [pfInUpdate]
      FixedChar = True
      Size = 1
    end
    object cdsDetailImplantacaoModuloADMINISTRATIVO_MODULO: TStringField
      FieldName = 'ADMINISTRATIVO_MODULO'
      ProviderFlags = [pfInUpdate]
      FixedChar = True
      Size = 1
    end
    object cdsDetailImplantacaoModuloFINANCEIRO_MODULO: TStringField
      FieldName = 'FINANCEIRO_MODULO'
      ProviderFlags = [pfInUpdate]
      FixedChar = True
      Size = 1
    end
    object cdsDetailImplantacaoModuloSPED_FISCAL_MODULO: TStringField
      FieldName = 'SPED_FISCAL_MODULO'
      ProviderFlags = [pfInUpdate]
      FixedChar = True
      Size = 1
    end
    object cdsDetailImplantacaoModuloASSISTENCIA_TECNICA_MODULO: TStringField
      FieldName = 'ASSISTENCIA_TECNICA_MODULO'
      FixedChar = True
      Size = 1
    end
    object cdsDetailImplantacaoModuloESTOQUE_MODULO: TStringField
      FieldName = 'ESTOQUE_MODULO'
      FixedChar = True
      Size = 1
    end
    object cdsDetailImplantacaoModuloCOMPRAS_MODULO: TStringField
      FieldName = 'COMPRAS_MODULO'
      FixedChar = True
      Size = 1
    end
    object cdsDetailImplantacaoModuloPDV_MODULO: TStringField
      FieldName = 'PDV_MODULO'
      FixedChar = True
      Size = 1
    end
    object cdsDetailImplantacaoModuloQUANTIDADE_PDV_MODULO: TIntegerField
      FieldName = 'QUANTIDADE_PDV_MODULO'
    end
    object cdsDetailImplantacaoModuloPRODUCAO_MODULO: TStringField
      FieldName = 'PRODUCAO_MODULO'
      FixedChar = True
      Size = 1
    end
    object cdsDetailImplantacaoModuloNFE_MODULO: TStringField
      FieldName = 'NFE_MODULO'
      FixedChar = True
      Size = 1
    end
    object cdsDetailImplantacaoModuloNFCE_MODULO: TStringField
      FieldName = 'NFCE_MODULO'
      FixedChar = True
      Size = 1
    end
    object cdsDetailImplantacaoModuloFORCA_DE_VENDAS_MODULO: TStringField
      FieldName = 'FORCA_DE_VENDAS_MODULO'
      FixedChar = True
      Size = 1
    end
    object cdsDetailImplantacaoModuloQTDE_FORCA_DE_VENDAS_MODULO: TIntegerField
      FieldName = 'QTDE_FORCA_DE_VENDAS_MODULO'
    end
    object cdsDetailImplantacaoModuloFATURAMENTO_MODULO: TStringField
      FieldName = 'FATURAMENTO_MODULO'
      FixedChar = True
      Size = 1
    end
  end
  object sdsDetailImplantacaoModulo: TSQLDataSet
    SchemaName = 'sysdba'
    CommandText = 
      'select * from IMPLANTACAO_MODULO where COD_IMPLANTACAO = :cod_im' +
      'plantacao'
    DbxCommandType = 'Dbx.SQL'
    DataSource = dsImplantacaoModulo
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftInteger
        Name = 'cod_implantacao'
        ParamType = ptInput
      end>
    SQLConnection = CONEXAO
    Left = 608
    Top = 392
    object sdsDetailImplantacaoModuloCOD_IMPLANTACAO: TIntegerField
      FieldName = 'COD_IMPLANTACAO'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
    end
    object sdsDetailImplantacaoModuloADMINISTRATIVO_MODULO: TStringField
      FieldName = 'ADMINISTRATIVO_MODULO'
      ProviderFlags = [pfInUpdate]
      FixedChar = True
      Size = 1
    end
    object sdsDetailImplantacaoModuloCOMERCIAL_MODULO: TStringField
      FieldName = 'COMERCIAL_MODULO'
      ProviderFlags = [pfInUpdate]
      FixedChar = True
      Size = 1
    end
    object sdsDetailImplantacaoModuloFINANCEIRO_MODULO: TStringField
      FieldName = 'FINANCEIRO_MODULO'
      ProviderFlags = [pfInUpdate]
      FixedChar = True
      Size = 1
    end
    object sdsDetailImplantacaoModuloSPED_FISCAL_MODULO: TStringField
      FieldName = 'SPED_FISCAL_MODULO'
      ProviderFlags = [pfInUpdate]
      FixedChar = True
      Size = 1
    end
    object sdsDetailImplantacaoModuloASSISTENCIA_TECNICA_MODULO: TStringField
      FieldName = 'ASSISTENCIA_TECNICA_MODULO'
      FixedChar = True
      Size = 1
    end
    object sdsDetailImplantacaoModuloESTOQUE_MODULO: TStringField
      FieldName = 'ESTOQUE_MODULO'
      FixedChar = True
      Size = 1
    end
    object sdsDetailImplantacaoModuloCOMPRAS_MODULO: TStringField
      FieldName = 'COMPRAS_MODULO'
      FixedChar = True
      Size = 1
    end
    object sdsDetailImplantacaoModuloPDV_MODULO: TStringField
      FieldName = 'PDV_MODULO'
      FixedChar = True
      Size = 1
    end
    object sdsDetailImplantacaoModuloQUANTIDADE_PDV_MODULO: TIntegerField
      FieldName = 'QUANTIDADE_PDV_MODULO'
    end
    object sdsDetailImplantacaoModuloPRODUCAO_MODULO: TStringField
      FieldName = 'PRODUCAO_MODULO'
      FixedChar = True
      Size = 1
    end
    object sdsDetailImplantacaoModuloNFE_MODULO: TStringField
      FieldName = 'NFE_MODULO'
      FixedChar = True
      Size = 1
    end
    object sdsDetailImplantacaoModuloNFCE_MODULO: TStringField
      FieldName = 'NFCE_MODULO'
      FixedChar = True
      Size = 1
    end
    object sdsDetailImplantacaoModuloFORCA_DE_VENDAS_MODULO: TStringField
      FieldName = 'FORCA_DE_VENDAS_MODULO'
      FixedChar = True
      Size = 1
    end
    object sdsDetailImplantacaoModuloQTDE_FORCA_DE_VENDAS_MODULO: TIntegerField
      FieldName = 'QTDE_FORCA_DE_VENDAS_MODULO'
    end
    object sdsDetailImplantacaoModuloFATURAMENTO_MODULO: TStringField
      FieldName = 'FATURAMENTO_MODULO'
      FixedChar = True
      Size = 1
    end
  end
  object ppDBPipelineItemReport: TppDBPipeline
    DataSource = dsItemReport
    UserName = 'DBPipelineItemReport'
    Visible = False
    Left = 136
    Top = 472
  end
  object sdsItemReport: TSQLDataSet
    SchemaName = 'sysdba'
    CommandText = 'select * from rb_item'
    DbxCommandType = 'Dbx.SQL'
    MaxBlobSize = 1
    Params = <>
    SQLConnection = CONEXAO
    Left = 32
    Top = 464
    object sdsItemReportITEMID: TIntegerField
      FieldName = 'ITEMID'
    end
    object sdsItemReportFOLDERID: TIntegerField
      FieldName = 'FOLDERID'
    end
    object sdsItemReportNAME: TStringField
      FieldName = 'NAME'
      Size = 60
    end
    object sdsItemReportSIZE: TIntegerField
      FieldName = 'SIZE'
    end
    object sdsItemReportITEMTYPE: TIntegerField
      FieldName = 'ITEMTYPE'
    end
    object sdsItemReportMODIFIED: TStringField
      FieldName = 'MODIFIED'
      FixedChar = True
      Size = 1
    end
    object sdsItemReportDELETED: TStringField
      FieldName = 'DELETED'
      FixedChar = True
      Size = 1
    end
    object sdsItemReportTEMPLATE: TBlobField
      FieldName = 'TEMPLATE'
      Size = 1
    end
  end
  object dspItemReport: TDataSetProvider
    DataSet = sdsItemReport
    Left = 32
    Top = 520
  end
  object cdsItemReport: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspItemReport'
    Left = 32
    Top = 576
    object cdsItemReportITEMID: TIntegerField
      FieldName = 'ITEMID'
    end
    object cdsItemReportFOLDERID: TIntegerField
      FieldName = 'FOLDERID'
    end
    object cdsItemReportNAME: TStringField
      FieldName = 'NAME'
      Size = 60
    end
    object cdsItemReportSIZE: TIntegerField
      FieldName = 'SIZE'
    end
    object cdsItemReportITEMTYPE: TIntegerField
      FieldName = 'ITEMTYPE'
    end
    object cdsItemReportMODIFIED: TStringField
      FieldName = 'MODIFIED'
      FixedChar = True
      Size = 1
    end
    object cdsItemReportDELETED: TStringField
      FieldName = 'DELETED'
      FixedChar = True
      Size = 1
    end
    object cdsItemReportTEMPLATE: TBlobField
      FieldName = 'TEMPLATE'
      Size = 1
    end
  end
  object dsItemReport: TDataSource
    DataSet = cdsItemReport
    Left = 32
    Top = 640
  end
  object sdsTipoAtendimento: TSQLDataSet
    SchemaName = 'sysdba'
    CommandText = 'SELECT * FROM IMPLANTACAO_TIPO_ATENDIMENTO'
    DbxCommandType = 'Dbx.SQL'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = CONEXAO
    Left = 248
    Top = 472
    object sdsTipoAtendimentoCOD_TIPO_ATENDIMENTO: TStringField
      FieldName = 'COD_TIPO_ATENDIMENTO'
      Required = True
      Size = 4
    end
    object sdsTipoAtendimentoDESCRICAO_TIPO_ATENDIMENTO: TStringField
      FieldName = 'DESCRICAO_TIPO_ATENDIMENTO'
      Size = 50
    end
  end
  object dspTipoAtendimento: TDataSetProvider
    DataSet = sdsTipoAtendimento
    Left = 248
    Top = 536
  end
  object cdsTipoAtendimento: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspTipoAtendimento'
    AfterPost = cdsTipoAtendimentoAfterPost
    AfterDelete = cdsTipoAtendimentoAfterDelete
    Left = 248
    Top = 600
    object cdsTipoAtendimentoCOD_TIPO_ATENDIMENTO: TStringField
      FieldName = 'COD_TIPO_ATENDIMENTO'
      Required = True
      Size = 4
    end
    object cdsTipoAtendimentoDESCRICAO_TIPO_ATENDIMENTO: TStringField
      FieldName = 'DESCRICAO_TIPO_ATENDIMENTO'
      Size = 50
    end
  end
  object sdsDetailImplantacaoConsultor: TSQLDataSet
    SchemaName = 'sysdba'
    CommandText = 
      'select *  from IMPLANTACAO_CONSULTOR'#13#10'where COD_IMPLANTACAO = :c' +
      'od_implantacao'
    DbxCommandType = 'Dbx.SQL'
    DataSource = dsImplantacao
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftInteger
        Name = 'cod_implantacao'
        ParamType = ptInput
      end>
    SQLConnection = CONEXAO
    Left = 432
    Top = 480
  end
  object cdsDetailImplantacaoConsultor: TClientDataSet
    Aggregates = <>
    DataSetField = cdsImplantacaosdsDetailImplantacaoConsultor
    Params = <>
    AfterOpen = cdsDetailImplantacaoConsultorAfterOpen
    AfterClose = cdsDetailImplantacaoConsultorAfterClose
    AfterPost = cdsDetailImplantacaoConsultorAfterPost
    AfterDelete = cdsDetailImplantacaoConsultorAfterDelete
    Left = 432
    Top = 536
    object cdsDetailImplantacaoConsultorCOD_IMPLANTACAO: TIntegerField
      FieldName = 'COD_IMPLANTACAO'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
      Visible = False
    end
    object cdsDetailImplantacaoConsultorCOD_CONSULTOR: TIntegerField
      FieldName = 'COD_CONSULTOR'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
      Visible = False
    end
    object cdsDetailImplantacaoConsultornomeConsultor: TStringField
      DisplayLabel = 'NOME'
      DisplayWidth = 30
      FieldKind = fkLookup
      FieldName = 'nomeConsultor'
      LookupDataSet = cdsConsultorTemp
      LookupKeyFields = 'COD_CONSULTOR'
      LookupResultField = 'NOME_CONSULTOR'
      KeyFields = 'COD_CONSULTOR'
      ProviderFlags = []
      ReadOnly = True
      Size = 50
      Lookup = True
    end
    object cdsDetailImplantacaoConsultortelefone1: TStringField
      DisplayLabel = 'TELEFONE1'
      FieldKind = fkLookup
      FieldName = 'telefone1'
      LookupDataSet = cdsConsultorTemp
      LookupKeyFields = 'COD_CONSULTOR'
      LookupResultField = 'TELEFONE1_CONSULTOR'
      KeyFields = 'COD_CONSULTOR'
      ProviderFlags = []
      ReadOnly = True
      Lookup = True
    end
  end
  object sdsConsultorTemp: TSQLDataSet
    SchemaName = 'sysdba'
    CommandText = 'select *  from CONSULTOR'
    DbxCommandType = 'Dbx.SQL'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = CONEXAO
    Left = 248
    Top = 664
    object sdsConsultorTempCOD_CONSULTOR: TIntegerField
      FieldName = 'COD_CONSULTOR'
      Required = True
    end
    object sdsConsultorTempNOME_CONSULTOR: TStringField
      FieldName = 'NOME_CONSULTOR'
      Size = 50
    end
    object sdsConsultorTempTELEFONE1_CONSULTOR: TStringField
      FieldName = 'TELEFONE1_CONSULTOR'
      Size = 11
    end
    object sdsConsultorTempTELEFONE2_CONSULTOR: TStringField
      FieldName = 'TELEFONE2_CONSULTOR'
      Size = 11
    end
    object sdsConsultorTempATIVO_CONSULTOR: TStringField
      FieldName = 'ATIVO_CONSULTOR'
      FixedChar = True
      Size = 1
    end
  end
  object dspConsultorTemp: TDataSetProvider
    DataSet = sdsConsultorTemp
    Left = 344
    Top = 664
  end
  object cdsConsultorTemp: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspConsultorTemp'
    Left = 440
    Top = 664
    object cdsConsultorTempCOD_CONSULTOR: TIntegerField
      FieldName = 'COD_CONSULTOR'
      Required = True
    end
    object cdsConsultorTempNOME_CONSULTOR: TStringField
      FieldName = 'NOME_CONSULTOR'
      Size = 50
    end
    object cdsConsultorTempTELEFONE1_CONSULTOR: TStringField
      FieldName = 'TELEFONE1_CONSULTOR'
      Size = 11
    end
    object cdsConsultorTempTELEFONE2_CONSULTOR: TStringField
      FieldName = 'TELEFONE2_CONSULTOR'
      Size = 11
    end
    object cdsConsultorTempATIVO_CONSULTOR: TStringField
      FieldName = 'ATIVO_CONSULTOR'
      FixedChar = True
      Size = 1
    end
  end
end
